home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: delta / whiteline CD Series - delta.iso / games / 3d_ski / 3d_ski.bas (.txt) next >
Atari STOS Basic  |  1995-11-25  |  35KB  |  83 lines
  1. 14999 REM <<<<<<  t r a d e  >>>>>> (3D ski)
  2. 15005 FADE
  3. 15006 MODE
  4. 15033 EXTENSION (Index #0) (Token 0x80)
  5. 15034 RESERVE
  6. 15037 WAIT
  7. 15040 DEF
  8. 15050 DEF
  9. 15060 DEF
  10. 15070 FOR
  11. 15080 WAIT VBL
  12. 15090 MOVE X
  13. 15100 WAIT
  14. 15101 WAIT VBL
  15. 15102 WAIT
  16. 15109 REM WELCOME TO MY TRADING POST
  17. 15110 WAIT VBL
  18. 15120 REM BUT WAIT
  19. 15125 ANIM
  20. 16999 REM ski trial
  21. 17000 ANIM
  22. 17003 EXTENSION (Index #0) (Token 0x80)
  23. 17004 BCOPY
  24. 17020 VARNAME
  25. 17030 DEF
  26. 17095 INK
  27. 17096 SCREEN COPY
  28. 17097 SCREEN COPY
  29. 17100 SPRITE
  30. 17101 WAIT VBL
  31. 17102 LOCATE
  32. 17105 ANIM
  33. 17106 ANIM
  34. 17108 ANIM
  35. 17110 MUSIC
  36. 17111 VARNAME
  37. 17112 IF
  38. 17113 IF
  39. 17115 UNTIL
  40. 17116 ANIM
  41. 17117 VARNAME
  42. 17118 IF
  43. 17119 IF
  44. 17123 UNTIL
  45. 17124 REPEAT
  46. 17125 ANIM
  47. 17126 ANIM
  48. 17127 VARNAME
  49. 17128 VARNAME
  50. 17130 REPEAT
  51. 17135 INC
  52. 17140 VARNAME
  53. 17150 IF
  54. 17160 IF
  55. 17200 IF
  56. 17300 VARNAME
  57. 17310 SPRITE
  58. 17350 SCREEN COPY
  59. 17360 SCROLL
  60. 17365 VARNAME
  61. 17370 IF
  62. 17390 SCREEN COPY
  63. 17400 IF
  64. 17410 IF
  65. 17419 REM collision detect
  66. 17420 VARNAME
  67. 17440 IF
  68. 17460 IF
  69. 17500 INC
  70. 17510 IF
  71. 17520 IF
  72. 17530 IF
  73. 17540 IF
  74. 17550 IF
  75. 17560 IF
  76. 17940 UNTIL
  77. 17941 IF
  78. 17944 ANIM
  79. 17950 MOVE Y
  80. 17980 IF
  81. 17985 IF
  82. 17990 REPEAT
  83.